home *** CD-ROM | disk | FTP | other *** search
/ Aminet 1 (Walnut Creek) / Aminet - June 1993 [Walnut Creek].iso / aminet / dev / lang / pcq12src.lzh / Runtime / System / Libraries / MathTrans.asm < prev    next >
Assembly Source File  |  1991-03-13  |  2KB  |  132 lines
  1. *
  2. *    MathTrans.asm for PCQ Pascal
  3. *    Copyright 1990 Patrick Quaid
  4. *
  5. *    The stub routines for calling mathtrans.library routines.
  6. *
  7.  
  8.     XREF    _MathTransBase
  9.  
  10.     SECTION    PCQ_Runtime,CODE
  11.  
  12.     XREF    _LVOSPAcos
  13.     XDEF    _SPAcos
  14. _SPAcos
  15.     move.l    4(sp),d0
  16.     move.l    _MathTransBase,a6
  17.     jmp    _LVOSPAcos(a6)
  18.  
  19.     XREF    _LVOSPAsin
  20.     XDEF    _SPAsin
  21. _SPAsin
  22.     move.l    4(sp),d0
  23.     move.l    _MathTransBase,a6
  24.     jmp    _LVOSPAsin(a6)
  25.  
  26.     XREF    _LVOSPAtan
  27.     XDEF    _SPAtan
  28. _SPAtan
  29.     move.l    4(sp),d0
  30.     move.l    _MathTransBase,a6
  31.     jmp    _LVOSPAtan(a6)
  32.  
  33.     XREF    _LVOSPCos
  34.     XDEF    _SPCos
  35. _SPCos
  36.     move.l    4(sp),d0
  37.     move.l    _MathTransBase,a6
  38.     jmp    _LVOSPCos(a6)
  39.  
  40.     XREF    _LVOSPCosh
  41.     XDEF    _SPCosh
  42. _SPCosh
  43.     move.l    4(sp),d0
  44.     move.l    _MathTransBase,a6
  45.     jmp    _LVOSPCosh(a6)
  46.  
  47.     XREF    _LVOSPExp
  48.     XDEF    _SPExp
  49. _SPExp
  50.     move.l    4(sp),d0
  51.     move.l    _MathTransBase,a6
  52.     jmp    _LVOSPExp(a6)
  53.  
  54.     XREF    _LVOSPFieee
  55.     XDEF    _SPFieee
  56. _SPFieee
  57.     move.l    4(sp),d0
  58.     move.l    _MathTransBase,a6
  59.     jmp    _LVOSPFieee(a6)
  60.  
  61.     XREF    _LVOSPLog
  62.     XDEF    _SPLog
  63. _SPLog
  64.     move.l    4(sp),d0
  65.     move.l    _MathTransBase,a6
  66.     jmp    _LVOSPLog(a6)
  67.  
  68.     XREF    _LVOSPLog10
  69.     XDEF    _SPLog10
  70. _SPLog10
  71.     move.l    4(sp),d0
  72.     move.l    _MathTransBase,a6
  73.     jmp    _LVOSPLog10(a6)
  74.  
  75.     XREF    _LVOSPPow
  76.     XDEF    _SPPow
  77. _SPPow
  78.     movem.l    4(sp),d0/d1
  79.     move.l    _MathTransBase,a6
  80.     jmp    _LVOSPPow(a6)
  81.  
  82.     XREF    _LVOSPSin
  83.     XDEF    _SPSin
  84. _SPSin
  85.     move.l    4(sp),d0
  86.     move.l    _MathTransBase,a6
  87.     jmp    _LVOSPSin(a6)
  88.  
  89.     XREF    _LVOSPSincos
  90.     XDEF    _SPSincos
  91. _SPSincos
  92.     movem.l    4(sp),d0/d1
  93.     move.l    _MathTransBase,a6
  94.     jmp    _LVOSPSincos(a6)
  95.  
  96.     XREF    _LVOSPSinh
  97.     XDEF    _SPSinh
  98. _SPSinh
  99.     move.l    4(sp),d0
  100.     move.l    _MathTransBase,a6
  101.     jmp    _LVOSPSinh(a6)
  102.  
  103.     XREF    _LVOSPSqrt
  104.     XDEF    _SPSqrt
  105. _SPSqrt
  106.     move.l    4(sp),d0
  107.     move.l    _MathTransBase,a6
  108.     jmp    _LVOSPSqrt(a6)
  109.  
  110.     XREF    _LVOSPTan
  111.     XDEF    _SPTan
  112. _SPTan
  113.     move.l    4(sp),d0
  114.     move.l    _MathTransBase,a6
  115.     jmp    _LVOSPTan(a6)
  116.  
  117.     XREF    _LVOSPTanh
  118.     XDEF    _SPTanh
  119. _SPTanh
  120.     move.l    4(sp),d0
  121.     move.l    _MathTransBase,a6
  122.     jmp    _LVOSPTanh(a6)
  123.  
  124.     XREF    _LVOSPTieee
  125.     XDEF    _SPTieee
  126. _SPTieee
  127.     move.l    4(sp),d0
  128.     move.l    _MathTransBase,a6
  129.     jmp    _LVOSPTieee(a6)
  130.  
  131.     END
  132.